home *** CD-ROM | disk | FTP | other *** search
/ NetNews Offline 2 / NetNews Offline Volume 2.iso / news / comp / lang / c-part1 / 2587 < prev    next >
Encoding:
Text File  |  1996-08-05  |  2.5 KB  |  67 lines
  1. Newsgroups: comp.os.ms-windows.programmer.networks,comp.os.ms-windows.programmer.misc,comp.lang.c,comp.lang.basic.visual.database
  2. Path: in1.uu.net!bcstec!ccmail
  3. From: wasmr600@ccmail.ca.boeing.com (Michael Washington)
  4. Subject: Re: NetBIOS Path Strings and Drive Letter Assignments
  5. X-Nntp-Posting-Host: e593668.evt.boeing.com
  6. Message-ID: <DLLCyB.3MC@bcstec.ca.boeing.com>
  7. Sender: nntp@bcstec.ca.boeing.com (NNTP News Access)
  8. Reply-To: wasmr600@ccmail.ca.boeing.com (Michael Washington)
  9. Organization: The Boeing Company
  10. References: <4dp4l2$bcf@noc.tor.hookup.net>
  11. Date: Mon, 22 Jan 1996 08:26:16 GMT
  12.  
  13. > 
  14. > NetBIOS Path Strings and Drive Letter Assignments
  15. > 
  16. > patrick@xiris.com (Patrick Whittle)
  17. > Fri, 19 Jan 1996 23:06:52 GMT
  18. > Xiris Incorporated
  19. > Newsgroups:
  20. > 
  21. comp.os.ms-windows.programmer.networks,comp.os.ms-windows.programmer.mis
  22. c,comp.lang.c,comp.lang.basic.visual.database
  23. > 
  24. > Hi:
  25. > I am developing an application that accesses a share on our server 
  26. > using a NetBIOS path string (i.e. \\SHARE\NAME\<path>\file.ext). 
  27. > I want to use this path string because the share name will not change,
  28. > whereas the drive letter assignment a given user uses could at any 
  29. > time change. However, there is still a situation where I could make 
  30. > use of an API call that returns a drive letter being used.
  31. > Do you know of an API call that returns network drive letter 
  32. > assignments?  Is there a way to find out what drive is connected to 
  33. > \\SHARE\NAME for example, using the API interface??
  34. > Please respond to patrick@xiris.com
  35. > Thanks ......... PW
  36. > ///////////////////////////////////////////
  37. > Patrick Whittle        Tel: (905) 681-8107
  38. >   Xiris Inc.           FAX: (905) 681-9844
  39. > E-mail:                patrick@xiris.com
  40. > Web Page:              http://www.hookup.net/~xiris/
  41.  
  42. If your network supports UNC you don't need to worry about finding the 
  43. next available drive letter. If it does not try using the following 
  44. function from the Microsoft knowledge base it uses the Win API 
  45. GETDRIVETYPE.
  46.  
  47. Declare Function GetDriveType Lib "kernel" (ByVal nDrive As Integer) As 
  48. Integer
  49.  
  50. Function Freedrv()
  51.  Dim DriveNum As Integer, FirstFreeDrive As String
  52.  Dim FirstDrive As Integer
  53.  DriveNum = -1
  54.  Do 
  55.    DriveNum = DriveNum +1  'start at drive zero
  56.    FirstDrive% = GetDriveType(DriveNum)
  57.    'GetDriveType returns zero if it cannot determine drive
  58.    'type or returns 1 if the specified drive does not exists
  59.  Loop Until FirstDrive% = 0
  60.  'DriveNum of 0 means Drive A, 1=B, 2=C, 3=D , and so on
  61.  FirstFreeDrive = Chr$(DriveNum+65) & ":"
  62.  FreeDrv = FristFreeDrive
  63. End Function
  64.  
  65.  
  66.  
  67.